home *** CD-ROM | disk | FTP | other *** search
/ 600 Games / 600games.iso / Puzzle / PuzzlePuzzle.swf / scripts / DefineButton2_299 / BUTTONCONDACTION on(keyPress Down).as
Encoding:
Text File  |  2005-08-05  |  951 b   |  36 lines
  1. on(keyPress "<Down>"){
  2.    js = 10;
  3.    while(js >= 0)
  4.    {
  5.       if(b[manbx][js] == 1 || b[manbx][js] == 2 || b[manbx][js] == 3 || b[manbx][js] == 4)
  6.       {
  7.          kkb = js;
  8.          break;
  9.       }
  10.       js--;
  11.    }
  12.    ssb = kkb * 8 + manbx;
  13.    if((manbcolor == 0 || manbcolor == b[manbx][kkb]) && (b[manbx][kkb] == 1 || b[manbx][kkb] == 2 || b[manbx][kkb] == 3 || b[manbx][kkb] == 4))
  14.    {
  15.       manb.gotoandplay("down");
  16.       sound.gotoandplay("down");
  17.       this["gb" add ssb].gotoandplay("down");
  18.       manbcolor = b[manbx][kkb];
  19.       manbnumber += 1;
  20.       b[manbx][kkb] = 0;
  21.       aab = 1;
  22.       while(aab < 12 && kkb - aab >= 0)
  23.       {
  24.          if(b[manbx][kkb - aab] != manbcolor)
  25.          {
  26.             break;
  27.          }
  28.          manbnumber += 1;
  29.          ssb2 = (kkb - aab) * 8 + manbx;
  30.          this["gb" add ssb2].gotoandplay("down");
  31.          b[manbx][kkb - aab] = 0;
  32.          aab++;
  33.       }
  34.    }
  35. }
  36.